home *** CD-ROM | disk | FTP | other *** search
/ PCGUIA 127 / PC Guia 127.iso / Software / Produtividade / OpenOffice.org 2.0.1 / openofficeorg2.cab / wordml2ooo.xsl < prev    next >
Extensible Markup Language  |  2005-09-10  |  20KB  |  333 lines
  1. <?xml version="1.0" encoding="UTF-8"?>
  2. <!--
  3.  
  4.     OpenOffice.org - a multi-platform office productivity suite
  5.  
  6.     $RCSfile: wordml2ooo.xsl,v $
  7.  
  8.     $Revision: 1.10 $
  9.  
  10.     last change: $Author: rt $ $Date: 2005/09/08 22:11:10 $
  11.  
  12.     The Contents of this file are made available subject to
  13.     the terms of GNU Lesser General Public License Version 2.1.
  14.  
  15.  
  16.       GNU Lesser General Public License Version 2.1
  17.       =============================================
  18.       Copyright 2005 by Sun Microsystems, Inc.
  19.       901 San Antonio Road, Palo Alto, CA 94303, USA
  20.  
  21.       This library is free software; you can redistribute it and/or
  22.       modify it under the terms of the GNU Lesser General Public
  23.       License version 2.1, as published by the Free Software Foundation.
  24.  
  25.       This library is distributed in the hope that it will be useful,
  26.       but WITHOUT ANY WARRANTY; without even the implied warranty of
  27.       MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  28.       Lesser General Public License for more details.
  29.  
  30.       You should have received a copy of the GNU Lesser General Public
  31.       License along with this library; if not, write to the Free Software
  32.       Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  33.       MA  02111-1307  USA
  34.  
  35. -->
  36. <xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform" xmlns:fo="urn:oasis:names:tc:opendocument:xmlns:xsl-fo-compatible:1.0" xmlns:w="http://schemas.microsoft.com/office/word/2003/wordml" xmlns:wx="http://schemas.microsoft.com/office/word/2003/auxHint" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:aml="http://schemas.microsoft.com/aml/2001/core" xmlns:dt="uuid:C2F41010-65B3-11d1-A29F-00AA00C14882" xmlns:v="urn:schemas-microsoft-com:vml" xmlns:office="urn:oasis:names:tc:opendocument:xmlns:office:1.0" xmlns:style="urn:oasis:names:tc:opendocument:xmlns:style:1.0" xmlns:text="urn:oasis:names:tc:opendocument:xmlns:text:1.0" xmlns:table="urn:oasis:names:tc:opendocument:xmlns:table:1.0" xmlns:draw="urn:oasis:names:tc:opendocument:xmlns:drawing:1.0" xmlns:xlink="http://www.w3.org/1999/xlink" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:meta="urn:oasis:names:tc:opendocument:xmlns:meta:1.0" xmlns:number="urn:oasis:names:tc:opendocument:xmlns:datastyle:1.0" xmlns:svg="urn:oasis:names:tc:opendocument:xmlns:svg-compatible:1.0" xmlns:chart="urn:oasis:names:tc:opendocument:xmlns:chart:1.0" xmlns:dr3d="urn:oasis:names:tc:opendocument:xmlns:dr3d:1.0" xmlns:math="http://www.w3.org/1998/Math/MathML" xmlns:form="urn:oasis:names:tc:opendocument:xmlns:form:1.0" xmlns:script="urn:oasis:names:tc:opendocument:xmlns:script:1.0" xmlns:config="urn:oasis:names:tc:opendocument:xmlns:config:1.0" xmlns:ooo="http://openoffice.org/2004/office" xmlns:ooow="http://openoffice.org/2004/writer" xmlns:oooc="http://openoffice.org/2004/calc" xmlns:dom="http://www.w3.org/2001/xml-events" exclude-result-prefixes="w wx aml o dt  v" xmlns:fla="urn:experimental:fla">
  37.     <xsl:output method="xml" indent="no" encoding="UTF-8" version="1.0"/>
  38.     <xsl:include href="../../common/measure_conversion.xsl"/>
  39.     <xsl:include href="../common/ms2ooo_docpr.xsl"/>
  40.     <xsl:include href="wordml2ooo_text.xsl"/>
  41.     <xsl:include href="wordml2ooo_settings.xsl"/>
  42.     <xsl:include href="wordml2ooo_table.xsl"/>
  43.     <xsl:include href="wordml2ooo_page.xsl"/>
  44.     <xsl:include href="wordml2ooo_list.xsl"/>
  45.     <xsl:include href="wordml2ooo_draw.xsl"/>
  46.     <xsl:include href="wordml2ooo_field.xsl"/>
  47.     <xsl:include href="wordml2ooo_props.xsl"/>
  48.     <xsl:key name="paragraph-style" match="w:style[@w:type = 'paragraph']" use="@w:styleId"/>
  49.     <xsl:key name="heading-style" match="w:style[@w:type = 'paragraph' and w:pPr/w:outlineLvl]" use="@w:styleId"/>
  50.     <xsl:template match="/">
  51.         <xsl:apply-templates select="w:wordDocument"/>
  52.     </xsl:template>
  53.     <xsl:template match="w:wordDocument">
  54.         <office:document office:mimetype="application/x-vnd.oasis.openoffice.text" office:version="1.0">
  55.         <fla:fla.activate/>
  56.             <xsl:apply-templates select="o:DocumentProperties"/>
  57.             <xsl:apply-templates select="w:docOleData" mode="init"/>
  58.             <xsl:apply-templates select="w:docPr"/>
  59.             <xsl:apply-templates select="w:fonts"/>
  60.             <xsl:apply-templates select="w:styles"/>
  61.             <xsl:apply-templates select="w:body"/>
  62.             <xsl:apply-templates select="w:docOleData" mode="exit"/>
  63.         </office:document>
  64.     </xsl:template>
  65.     <xsl:template match="w:fonts">
  66.         <xsl:element name="office:font-face-decls">
  67.             <!-- MS Word's default font declaration, added for Writer automatically. glu -->
  68.             <style:font-face style:name="Arial" svg:font-family="Arial" style:font-family-generic="roman" style:font-pitch="variable"/>
  69.             <style:font-face style:name="Times New Roman" svg:font-family="'Times New Roman'" style:font-family-generic="roman" style:font-pitch="variable"/>
  70.             <style:font-face style:name="Symbol" svg:font-family="Symbol" style:font-family-generic="roman" style:font-pitch="variable" style:font-charset="x-symbol"/>
  71.             <style:font-face style:name="Courier New" svg:font-family="'Courier New'" style:font-family-generic="modern" style:font-pitch="fixed"/>
  72.             <xsl:if test="not(w:font[@w:name='StarSymbol'])">
  73.                 <style:font-face style:name="StarSymbol" svg:font-family="StarSymbol" style:font-charset="x-symbol"/>
  74.             </xsl:if>
  75.             <xsl:for-each select="w:font">
  76.                 <xsl:element name="style:font-face">
  77.                     <xsl:attribute name="style:name">
  78.                         <xsl:value-of select="@w:name"/>
  79.                     </xsl:attribute>
  80.                     <xsl:attribute name="svg:font-family">
  81.                         <xsl:value-of select="@w:name"/>
  82.                     </xsl:attribute>
  83.                     <!-- added by glu, for process special fonts e.g. Marlett, -->
  84.                     <xsl:if test="w:charset/@w:val = '02'">
  85.                         <xsl:attribute name="style:font-charset">x-symbol</xsl:attribute>
  86.                     </xsl:if>
  87.                     <xsl:if test="w:family">
  88.                         <xsl:choose>
  89.                             <xsl:when test="w:family/@w:val = 'Swiss'">
  90.                                 <xsl:attribute name="style:font-family-generic">swiss</xsl:attribute>
  91.                             </xsl:when>
  92.                             <xsl:when test="w:family/@w:val='Modern'">
  93.                                 <xsl:attribute name="style:font-family-generic">modern</xsl:attribute>
  94.                             </xsl:when>
  95.                             <xsl:when test="w:family/@w:val='Roman'">
  96.                                 <xsl:attribute name="style:font-family-generic">roman</xsl:attribute>
  97.                             </xsl:when>
  98.                             <xsl:when test="w:family/@w:val='Script'">
  99.                                 <xsl:attribute name="style:font-family-generic">script</xsl:attribute>
  100.                             </xsl:when>
  101.                             <xsl:when test="w:family/@w:val='Decorative'">
  102.                                 <xsl:attribute name="style:font-family-generic">decorative</xsl:attribute>
  103.                             </xsl:when>
  104.                             <xsl:when test="w:family/@w:val='System'">
  105.                                 <xsl:attribute name="style:font-family-generic">system</xsl:attribute>
  106.                             </xsl:when>
  107.                             <xsl:otherwise>
  108.                                 <xsl:attribute name="style:font-family-generic">system</xsl:attribute>
  109.                             </xsl:otherwise>
  110.                         </xsl:choose>
  111.                     </xsl:if>
  112.                     <xsl:if test="w:pitch and string-length(w:pitch/@w:val) > 0">
  113.                         <xsl:attribute name="style:font-pitch">
  114.                             <xsl:choose>
  115.                                 <xsl:when test="w:pitch/@w:val = 'default'">variable</xsl:when>
  116.                                 <xsl:otherwise>
  117.                                     <xsl:value-of select="w:pitch/@w:val"/>
  118.                                 </xsl:otherwise>
  119.                             </xsl:choose>
  120.                         </xsl:attribute>
  121.                     </xsl:if>
  122.                 </xsl:element>
  123.             </xsl:for-each>
  124.         </xsl:element>
  125.     </xsl:template>
  126.     <xsl:template match="w:styles">
  127.         <office:styles>
  128.             <!--The next statement Added by wguo,collect the pict's dash and mark-style.The template is implemented in file wordml2ooo_draw.xsl-->
  129.             <xsl:apply-templates select="/w:wordDocument/w:body//w:pict" mode="style4dash_mark"/>
  130.             <xsl:apply-templates select="//v:fill" mode="office-style"/>
  131.             <xsl:call-template name="create-default-paragraph-styles"/>
  132.             <xsl:call-template name="create-default-text-styles"/>
  133.             <xsl:call-template name="create-default-frame-style"/>
  134.             <!-- StarWriter has no default style family 'list'. glu -->
  135.             <xsl:if test="w:style[@w:type = 'paragraph' and w:pPr/w:outlineLvl and w:pPr/w:listPr]">
  136.                 <xsl:call-template name="create-outline-style"/>
  137.             </xsl:if>
  138.             <xsl:apply-templates select="w:style[@w:type='table']" mode="table"/>
  139.             <xsl:apply-templates select="w:style[@w:type='list']" mode="list"/>
  140.             <xsl:apply-templates select="w:style[@w:type!='list']"/>
  141.             <xsl:apply-templates select="/w:wordDocument/w:docPr/w:footnotePr" mode="config"/>
  142.             <xsl:apply-templates select="/w:wordDocument/w:docPr/w:endnotePr" mode="config"/>
  143.         </office:styles>
  144.         <office:automatic-styles>
  145.             <xsl:apply-templates select="/w:wordDocument/w:body//w:p" mode="style"/>
  146.             <xsl:apply-templates select="/w:wordDocument/w:body//w:rPr[not(parent::w:pPr)]" mode="style"/>
  147.             <!--The next statement Added by wguo for the pict's draw-style.The template is implemented in file wordml2ooo_draw.xsl-->
  148.             <xsl:apply-templates select="/w:wordDocument/w:body//w:pict" mode="style"/>
  149.             <xsl:apply-templates select="/w:wordDocument/w:body//w:tblPr" mode="style"/>
  150.             <xsl:apply-templates select="/w:wordDocument/w:body//w:gridCol" mode="style"/>
  151.             <xsl:apply-templates select="/w:wordDocument/w:body//w:trPr" mode="style"/>
  152.             <xsl:apply-templates select="/w:wordDocument/w:body//w:tcPr" mode="style"/>
  153.             <xsl:apply-templates select="/w:wordDocument/w:body//w:listPr" mode="style"/>
  154.             <xsl:apply-templates select="/w:wordDocument/w:body//w:sectPr" mode="page-layout"/>
  155.             <xsl:call-template name="default_date_style"/>
  156.             <!--add for generate the date , time style for date , time field  G.Y.-->
  157.             <xsl:apply-templates select="/w:wordDocument/w:body//w:instrText | /w:wordDocument/w:body//w:fldSimple " mode="style"/>
  158.         </office:automatic-styles>
  159.         <office:master-styles>
  160.             <xsl:apply-templates select="/w:wordDocument/w:body//w:sectPr" mode="master-page"/>
  161.         </office:master-styles>
  162.     </xsl:template>
  163.     <xsl:template match="w:style">
  164.         <style:style>
  165.             <xsl:attribute name="style:name">
  166.                 <xsl:value-of select="concat('w',translate(@w:styleId,' ~`!@#$%^*(&)+/,;?<>{}[]:','_'))"/>
  167.             </xsl:attribute>
  168.             <xsl:if test="w:basedOn">
  169.                 <xsl:attribute name="style:parent-style-name">
  170.                     <xsl:value-of select="concat('w',translate(w:basedOn/@w:val,' ~`!@#$%^*(&)+/,;?<>{}[]:','_'))"/>
  171.                 </xsl:attribute>
  172.             </xsl:if>
  173.             <xsl:if test="w:next">
  174.                 <xsl:attribute name="style:next-style-name">
  175.                     <xsl:value-of select="concat('w',translate(w:basedOn/@w:val,' ~`!@#$%^*(&)+/,;?<>{}[]:','_'))"/>
  176.                 </xsl:attribute>
  177.             </xsl:if>
  178.             <xsl:choose>
  179.                 <xsl:when test="@w:type = 'character'">
  180.                     <xsl:attribute name="style:family">text</xsl:attribute>
  181.                 </xsl:when>
  182.                 <!-- table, paragraph are the same as in Writer . glu -->
  183.                 <xsl:when test="@w:type">
  184.                     <xsl:attribute name="style:family">
  185.                         <xsl:value-of select="@w:type"/>
  186.                     </xsl:attribute>
  187.                 </xsl:when>
  188.                 <xsl:otherwise>
  189.                     <xsl:attribute name="style:family">text</xsl:attribute>
  190.                 </xsl:otherwise>
  191.             </xsl:choose>
  192.             <xsl:choose>
  193.                 <xsl:when test="@w:type = 'table'">
  194.                     <xsl:element name="style:table-properties">
  195.                         <!-- xsl:apply-templates select="w:tblPr" mode="style"/ -->
  196.                     </xsl:element>
  197.                 </xsl:when>
  198.                 <xsl:when test="@w:type = 'character' ">
  199.                     <xsl:element name="style:text-properties">
  200. <!--
  201.                         <xsl:apply-templates select="w:pPr/w:rPr"/>
  202.                         <xsl:apply-templates select="w:rPr"/>
  203. -->
  204.             <xsl:for-each select="w:rPr">
  205.             <xsl:call-template name="text-properties"/>
  206.             </xsl:for-each>
  207.                     </xsl:element>
  208.                 </xsl:when>
  209.                 <xsl:otherwise>
  210.                     <xsl:element name="style:paragraph-properties">
  211.                         <xsl:apply-templates select="w:pPr"/>
  212.                     </xsl:element>
  213.                     <xsl:element name="style:text-properties">
  214.                         <xsl:apply-templates select="w:rPr"/>
  215.                         <xsl:apply-templates select="w:pPr/w:rPr"/>
  216.                     </xsl:element>
  217.                 </xsl:otherwise>
  218.             </xsl:choose>
  219.         </style:style>
  220.     </xsl:template>
  221.     <xsl:template match="w:body">
  222.         <xsl:element name="office:body">
  223.             <xsl:element name="office:text">
  224.                 <!-- to add the sequece variable declaration at the begining of the office:body  G.Y.-->
  225.                 <text:sequence-decls>
  226.                     <xsl:call-template name="default_seqence_declaration"/>
  227.                     <xsl:apply-templates select="/w:wordDocument/w:body//w:instrText[substring(normalize-space(text()),1,3) = 'SEQ' ] | /w:wordDocument/w:body//w:fldSimple[substring(normalize-space(@w:instr),1,3) = 'SEQ' ]  " mode="sequence_declare"/>
  228.                 </text:sequence-decls>
  229.                 <!--  add the user field variables declare for Docpropety fields importing G.Y.-->
  230.                 <text:user-field-decls>
  231.                     <xsl:call-template name="user_fields_declare_docproperty"/>
  232.                 </text:user-field-decls>
  233.                 <xsl:apply-templates select="wx:sect | w:p | w:tbl | w:sectPr"/>
  234.             </xsl:element>
  235.         </xsl:element>
  236.     </xsl:template>
  237.     <xsl:template match="wx:sect">
  238.         <xsl:apply-templates select="wx:sub-section | w:p | w:tbl | w:sectPr"/>
  239.     </xsl:template>
  240.     <xsl:template match="wx:sub-section">
  241.         <xsl:apply-templates select="wx:sub-section | w:p | w:tbl | w:sectPr"/>
  242.     </xsl:template>
  243.     <xsl:template name="create-default-frame-style">
  244.         <!--add for default frame style -->
  245.         <style:style style:name="Frame" style:family="graphic">
  246.             <style:graphic-properties text:anchor-type="paragraph" svg:x="0in" svg:y="0in" style:wrap="parallel" style:number-wrapped-paragraphs="no-limit" style:wrap-contour="false" style:vertical-pos="top" style:vertical-rel="paragraph-content" style:horizontal-pos="center" style:horizontal-rel="paragraph-content"/>
  247.         </style:style>
  248.     </xsl:template>
  249.     <xsl:template name="ConvertMeasure">
  250.         <xsl:param name="TargetMeasure" select="'cm'"/>
  251.         <xsl:param name="TargetTruncate" select=" 'all' "/>
  252.         <xsl:param name="value"/>
  253.         <!-- When TargetTruncate ='all'  it returns the number whichsoever the return value is negative or positive
  254.                When TargetTruncate ='nonNegative' it only returns nonNegative number, all negative number to be returned as 0
  255.                When TargetTruncate ='positive" it only returns positive number, all nonPositive number to be returned as 1 -->
  256.         <xsl:variable name="return_value">
  257.             <xsl:choose>
  258.                 <!-- remove the measure mark, if the value is null, the result should be 0. Must be the first case  -->
  259.                 <xsl:when test="string-length(translate($value,'abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ ','')) = 0">0</xsl:when>
  260.                 <xsl:when test="string-length(translate($value,'-.0123456789 ','')) = 0">
  261.                     <xsl:value-of select="$value"/>
  262.                 </xsl:when>
  263.                 <xsl:when test="$TargetMeasure = 'cm'">
  264.                     <xsl:call-template name="convert2cm">
  265.                         <xsl:with-param name="value" select="$value"/>
  266.                     </xsl:call-template>
  267.                 </xsl:when>
  268.                 <xsl:when test="$TargetMeasure = 'pt'">
  269.                     <xsl:call-template name="convert2pt">
  270.                         <xsl:with-param name="value" select="$value"/>
  271.                     </xsl:call-template>
  272.                 </xsl:when>
  273.                 <xsl:when test="$TargetMeasure = 'twip'">
  274.                     <xsl:call-template name="convert2twip">
  275.                         <xsl:with-param name="value" select="$value"/>
  276.                     </xsl:call-template>
  277.                 </xsl:when>
  278.                 <xsl:when test="$TargetMeasure = 'in'">
  279.                     <xsl:call-template name="convert2in">
  280.                         <xsl:with-param name="value" select="$value"/>
  281.                     </xsl:call-template>
  282.                 </xsl:when>
  283.             </xsl:choose>
  284.         </xsl:variable>
  285.         <xsl:choose>
  286.             <xsl:when test="$TargetTruncate = 'all' ">
  287.                 <xsl:choose>
  288.                     <xsl:when test="number($TargetMeasure) = 'NaN' ">
  289.                         <xsl:value-of select=" '0' "/>
  290.                     </xsl:when>
  291.                     <xsl:otherwise>
  292.                         <xsl:value-of select="$return_value"/>
  293.                     </xsl:otherwise>
  294.                 </xsl:choose>
  295.             </xsl:when>
  296.             <xsl:when test="$TargetTruncate = 'nonNegative' ">
  297.                 <xsl:choose>
  298.                     <xsl:when test="number($TargetMeasure) = 'NaN' ">
  299.                         <xsl:value-of select=" '0' "/>
  300.                     </xsl:when>
  301.                     <xsl:otherwise>
  302.                         <xsl:choose>
  303.                             <xsl:when test=" $return_value < 0  ">
  304.                                 <xsl:value-of select=" '0' "/>
  305.                             </xsl:when>
  306.                             <xsl:otherwise>
  307.                                 <xsl:value-of select="$return_value"/>
  308.                             </xsl:otherwise>
  309.                         </xsl:choose>
  310.                     </xsl:otherwise>
  311.                 </xsl:choose>
  312.             </xsl:when>
  313.             <xsl:when test="$TargetTruncate = 'positive' ">
  314.                 <xsl:choose>
  315.                     <xsl:when test="number($TargetMeasure) = 'NaN' ">
  316.                         <xsl:value-of select=" '1' "/>
  317.                     </xsl:when>
  318.                     <xsl:otherwise>
  319.                         <xsl:choose>
  320.                             <xsl:when test=" $return_value <= 0 ">
  321.                                 <xsl:value-of select=" '1' "/>
  322.                             </xsl:when>
  323.                             <xsl:otherwise>
  324.                                 <xsl:value-of select="$return_value"/>
  325.                             </xsl:otherwise>
  326.                         </xsl:choose>
  327.                     </xsl:otherwise>
  328.                 </xsl:choose>
  329.             </xsl:when>
  330.         </xsl:choose>
  331.     </xsl:template>
  332. </xsl:stylesheet>
  333.